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Related Publications 



This is an introductory manual that describes the Mathematical and Functional 
Subroutine Library (MFSL) for the IBM Series/ 1. MFSL comprises 
mathematical, EBCDIC conversion, and error-checking subroutines for both 
FORTRAN IV and assembler language users. Library service routines are 
included for assembler language users only. The topics covered include a general 
description of MFSL and a description of using MFSL with the application 
system. 

The reader should be familiar with the basic coding techniques of FORTRAN 
IV or assembler programming; the related language publications are listed below. 
The section "MFSL and the Application System" is related to the IBM Series/ 1 
Program Preparation Subsystem program product and the IBM Series/ 1 Realtime 
Programming System program product. The reader may find it useful to refer to 
the introductory publications listed below for these program products. 

This publication describes the basic mathematical and functional capability of the 
MFSL program product. Related subroutine support for executive functions and 
realtime process input/output is provided by the FORTRAN IV Realtime Subroutine 
Library program product. For information on these subroutines, see the related 
FORTRAN IV publication listed below. 



IBM Series/1 FORTRAN IV: Introduction, GC34-0132. 

IBM Series/ 1 FORTRAN IV: Language Reference, GC34-0133. 

IBM Series/ 1 Program Preparation Subsystem: Macro Assembler User's Guide, 

SC34-0124. 

IBM Series/ 1 Program Preparation Subsystem: Introduction, GC34-0121. 

IBM Series/ 1 Realtime Programming System: Introduction and Planning Guide, 

GC34-0102. 

IBM Series/1 System Summary, GC34-0035. 
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The Mathematical and Functional Subroutine Library 



The Mathematical and Functional Subroutine Library (MFSL) is a set of 
subroutines that aids in developing application programs. The MFSL subroutines 
can be used with the IBM Series/ 1 FORTRAN IV program product (hereafter 
referred to as FORTRAN IV) or the macro assembler language provided with 
the IBM Series/ 1 Program Preparation Subsystem program product (hereafter 
referred to as Program Preparation Subsystem). The operating environment 
required for MFSL, FORTRAN IV, and the assembler is provided by the IBM 
Series/ 1 Realtime Programming System program product (hereafter referred to as 
Realtime Programming System). A user- written operating system that provides 
the required interfaces can also use the MFSL subroutines. 

MFSL is compatible with any Series/ 1 hardware configuration that includes 
the primary and secondary storage required for the MFSL subroutines used. The 
configuration requires floating-point support only if the user application requires 
REAL or floating-point arithmetic. MFSL functions that operate on integer or 
fixed-point variables have no internal requirements for floating-point support. 



General Description 






Mathematical Subroutines 



o 
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In the course of developing application programs, many mathematical and other 
functions are performed over and over again. These functions are often difficult 
and tedious to implement. For this reason, a set of mathematical and functional 
subroutines that perform the functions required can save time and effort in 
developing applications. The functions provided by MFSL are as follows: 



Arc Tangent, one or two arguments: 

Given one argument, an arc tangent subroutine returns the angle that has the 

argument as its tangent. Given two arguments, an arc tangent subroutine returns 

the angle that has the quotient of the two arguments as its tangent. All angles are 

in radians. 

Cosine: 

A sine-cosine subroutine returns the value of the cosine of the argument. All 

angles are in radians. 

Doubleword Divide: 

A division subroutine returns the doubleword value of a doubleword number 

divided by a doubleword number. 

Doubleword Multiply: 

A multiplication subroutine returns the doubleword value of a doubleword 

number multiplied by a doubleword number. 

Exponential function: 

An exponential subroutine returns the value of e raised to the power of the 

argument. 

Exponentiation : 

An exponentiation subroutine returns the value of any base raised to any power. 

Hyperbolic tangent: 

A hyperbolic tangent subroutine returns the value of the hyperbolic tangent for 

the argument. 

Logarithms, common or natural: 

Logarithmic subroutines return the value of the base 10 or base e logarithm of 

the argument. 
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Maximum value: 

A maximum value subroutine returns the value of the largest argument in a set of 

arguments. 

Minimum value: 

A minimum value subroutine returns the value of the smallest argument in a set 

of arguments. 

Modular arithmetic: 

A modular arithmetic subroutine returns the remainder from the division of two 

arguments. 

Positive difference: 

A positive difference subroutine returns the positive difference between the first 

argument and the smaller of two arguments. 

Sine: 

A sine-cosine subroutine returns the value of the sine of the argument. All angles 

are in radians. 

Square root: 

A square root subroutine returns the value of the square root of the argument. 

Transfer of sign: 

A transfer-of-sign subroutine returns the value of the sign of the second 

argument concatenated to the absolute value of the first argument. 



Conversion Subroutines 



EBCDIC to floating-point: 

A conversion subroutine converts an EBCDIC input into a floating-point 

number. 

EBCDIC to integer: 

A conversion subroutine converts an EBCDIC input into an integer value. 

Floating-point to EBCDIC: 

A conversion subroutine converts a floating-point number into an EBCDIC 

output. 

Integer to EBCDIC: 

A conversion subroutine converts an integer value into an EBCDIC output. 

Error-Checking Subroutines 

Function test: 

A function test subroutine determines if an error was detected in any MFSL 

logarithmic, trigonometric, exponentiation, square root, or conversion subroutine 

since the last call to function test. 

Floating-point divide exception: 

A floating-point divide exception subroutine determines if an error in a 

floating-point divide operation has occurred since the last call to floating-point 

divide exception. 

Floating-point overflow/underflow: 

A floating-point overflow/underflow subroutine determines if an overflow or 

underflow condition has occurred since the last call to floating-point 

overflow/underflow. 

Service Subroutines (Assembler Applications Only) 

Applications that consist entirely of assembler-coded programs require these 
services. FORTRAN IV programs, or assembler programs that run under 
FORTRAN IV main programs, should not call these subroutines. The 
FORTRAN IV compiler generates the necessary interfaces without any user 
action. 
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Library work area initialization /termination: 

An initialization or termination subroutine creates or deletes a work area in 

storage for user communication (error flagging). 

Abnormal termination routine specification: 

An abnormal termination routine specification subroutine allows the user to 

specify a routine to receive control if a program interruption occurs or if an 

abnormal termination macro instruction (STOPTASK) is issued. 

Subroutine Library Contents 

MFSL contains four types of subroutines: (1) mathematical functions such as 
SIN and SQRT, (2) EBCDIC conversion subroutines such as $FCIN 
(EBCDIC -to-floating-point), (3) error-checking subroutines such as FCTST 
(function test), and (4) subroutine library services such as $FMYINT (work area 
initialization). 

The library subroutines can be used in either a FORTRAN IV or assembler 
language program. In FORTRAN IV, calls to the library subroutines are either at 
the programmer's request through explicit references to subroutine names or in 
response to the FORTRAN IV exponentiation notation. In assembler language, 
all MFSL subroutines are invoked through explicit calls to subroutine names. The 
MFSL subroutines are added to the application task set load module by the 
application builder. 



Mathematical Subroutines 






The MFSL mathematical subroutines perform many commonly used mathematical 
operations to aid the application programmer. The explicitly called mathematical 
subroutines include logarithmic and exponential functions, trigonometric 
functions, and the miscellaneous functions of maximum and minimum values, 
modular arithmetic, positive difference, and transfer of sign. These subroutines 
are described in Figure 1 through Figure 5. The implicitly called mathematical 
subroutines provide a general exponentiation capability and an INTEGER* 4 
(doubleword) multiply and divide capability. These subroutines are described in 
Figure 6. 
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General function 


Specific function 


Entry name(s) 


Logarithmic and exponential 
subroutines (described in 
Figure 2) 


Exponential 


EXP 
DEXP 


Logarithmic, 
common and 
natural 


ALOG, ALOG10 
DLOG, DLOG10 


Square root 


SQRT, DSQRT 


Trigonometric 
subroutines 
(described in 
Figure 3) 


Arc tangent 


ATAN, ATAN2 
DATAN, DATAN2 


Cosine and sine 


COS, DCOS 
SIN, DSIN 


Hyperbolic function 

subroutine 

(described in Figure 4) 


Hyperbolic tangent 


TANH, DTANH 


Miscellaneous 
subroutines 
(described in 
Figure 5) 


Maximum and minimum 
value 


MAXO, MINO 

MAX0#, MINO# 
AMAXO, AMINO 
AMAX0#, AMIN0# 
MAXl, MINI 
MAX1#, MIN1# 
AMAXl, AMINl 
DMAXl, DMINl 


Modular arithmetic 


MOD 

AMOD, DMOD 


Positive difference 


DIM 

IDIM, IDIM# 


Transfer of sign 


SIGN, DSIGN 
ISIGN, ISIGN# 






Figure 1. Explicitly called MFSL subroutines 
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General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 
type 1 and range 2 


No. 


Type 1 


Range 


Common 
and natural 
logarithm 


ALOG 


y=log e x or 
y=ln x 


1 


REAL*4 


x>0 


REAL*4 
y> -180.218 
y< 174.673 


ALOG10 


y=log 10 x 


1 


REAL*4 


x>0 


REAL*4 

y> -78.268 
y<75.859 


DLOG 


y=log e x or 
y=ln x 


1 


REAL*8 


x>0 


REAL*8 
y>-180.218 
y< 174.673 


DLOG10 


y=log 10 x 


1 


REAL*8 


x>0 


REAL*8 
y> -78.268 
y<75.859 


Exponential 


EXP 


y=e x 


1 


REAL*4 


x>-180.218 
x< 174.673 


REAL*4 
0<y<y 


DEXP 


y=e x 


1 


REAL*8 


x>-180.218 
x< 174.673 


REAL*8 
0<y<y 


Square root 


SQRT 


y=x 1 /2 


1 


REAL*4 


x>0 


REAL*4 

0<y<y 1/2 


DSQRT 


y^x 1 ^ 


1 


REAL*8 


x>0 


REAL*8 

0<y<y 1/2 


Notes. 

1 Assembler programming: REAL*4 and REAL*8 FORTRAN IV arguments correspond to doubleword and two-doubleword 

floating-point arguments, respectively. 

2 y is approximately 7.24 x 10 75 ; y 1 / 2 is approximately 8.51 x 10 37 . 



Figure 2. Logarithmic and exponential MFSL subroutines 
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General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 
type 1 and range 


No. 


Type 1 


Range 2 


Arc tangent 


ATAN 


y=arctan x 


1 


REAL*4 


Any REAL 
argument 


REAL*4 (in radians) 
-<rr/2<y<7r/2 


ATAN2 


y=arctan Xj/x2 


2 


REAL*4 


Any REAL 
arguments 
(except 0/0) 


REAL*4 (in radians) 
-w<y<77 - 


DATAN 


y=arctan x 


1 


REAL*8 


Any REAL 
argument 


REAL*8 (in radians) 

-7r/2<y<ir/2 


DATAN2 


y=arctan Xj/x2 


2 


REAL*8 


Any REAL 
arguments 
(except 0/0) 


-7r<y<i7 


Sine and 
cosine 


SIN 


y=sin x 


1 


REAL*4 
(in radians) 


| X | <2 18 17 


REALM 
-l<y<l 


COS 


y=cos x 


1 


REAL*4 

(in radians) 


I X | <2 18 7T 


REAL*4 
-l<y<l 


DSIN 


y=sin x 


1 


REAL*8 
(in radians) 


I x | <2 5( V 


REAL*8 
-l<y<l 


DCOS 


y=cos x 


1 


REAL*8 
(in radians) 


I x | <2 5( V 


REAL* 8 
-l<y<l 


Notes. 

1 Assembler programming: REAL*4 and REAL*8 FORTRAN IV arguments correspond to doubleword and two-doubleword 

floating-point arguments, respectively. 

2 The following are approximate values: 

2 18 ir=2.62 x lOV 

2 50 7T=1.13 x 10 15 7T 



Figure 3. Trigonometric MFSL subroutines 



General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 
type 1 and range 


No. 


Type 1 


Range 


Hyperbolic 
Tangent 


TANH 


y=(e x -e _x )/(e x +e _x ) 


1 


REAL*4 


Any REAL 
argument 


REAL*4 
-l<y<l 


DTANH 


y=(e x -e -x )/(e x +e -x ) 


1 


REAL*8 


Any REAL 
argument 


REAL*8 
-l<y<l 


Notes. 

1 Assembler programming: REAL*4 and REAL*8 FORTRAN IV arguments correspond to doubleword and two-doubleword 
floating-point arguments, respectively. 



Figure 4. Hyperbolic function MFSL subroutines 
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General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 
type 1 


No. 


Type 1 


Range 


Maximum 
and 

minimum 
values 


MAXO 


y=max (x, ,...,x n ) 


>2 


INTEGER*2 

or 

INTEGER*4 

(See Note 2) 


Any 
INTEGER 

arguments 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


MAX0# 
(See Note 3) 


y=max (x i ,...,x n ) 


>2 


INTEGER* 2 


Any 

INTEGER 

arguments 


INTEGER* 2 


MINO 


y=min (x, ,...,x n ) 


>2 


INTEGER*2 

or 

INTEGER*4 

(See Note 2) 


Any 
INTEGER 

arguments 


INTEGER*2 

or 

INTEGER*4 

(See Note 2) 


MIN0# 
(See Note 3) 


y=min (x i ,...,x n ) 


>2 


INTEGER*2 


Any 

INTEGER 

arguments 


INTEGER*2 


AMAXO 


y=max ^ ,...,x n ) 


>2 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


Any 

INTEGER 

arguments 


REAL*4 


AMAX0# 
(See Note 3) 


y=max (x, ,...,x n ) 


>2 


INTEGER* 2 


Any 

INTEGER 

arguments 


REAL*4 


AMINO 


y=min (x t ,...,x n ) 


>2 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


Any 
INTEGER 

arguments 


REAL*4 


AMIN0# 
(See Note 3) 


y=min (x, ,...,x n ) 


>2 


INTEGER* 2 


Any 
INTEGER 

arguments 


REAL*4 


Notes. 

(See end of Figure 5.) 



Figure 5. Miscellaneous mathematical subroutines (Part 1 of 3) 
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General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 

type 1 


No. 


Type 1 


Range 


Maximum 

and 

minimum 

values 

(cont.) 


MAX1 


y=max (Xj ,.»,x n ) 


>2 


REAL*4 


Any 

REAL 

arguments 


INTEGER*2 or 
INTEGER*4 
(See Note 2) 


MAX1# 
(See Note 3) 


y=max (x t ,...,x n ) 


>2 


REAL*4 


Any 

REAL 

arguments 


INTEGER* 2 


MINI 


y=min (x i ,...,x n ) 


>2 


REAL*4 


Any 
REAL 

arguments 


INTEGER* 2 or 
INTEGER*4 
(See Note 2) 


MIN1# 
(See Note 3) 


y=min (Xj ,...,x n ) 


>2 


REAL*4 


Any 

REAL 

arguments 


INTEGER*2 


AMAX1 


y=max (x t ,...,x n ) 


>2 


REAL*4 


Any 

REAL 

arguments 


REAL*4 


AMIN1 


y=min (x, ,...,x n ) 


>2 


REAL*4 


Any 
REAL 

arguments 


REAL*4 


DMAX1 


y=max (x, ,...,x n ) 


>2 


REAL* 8 


Any 

REAL 

arguments 


REAL* 8 


DMIN1 


y=min (x, ,...,x n ) 


>2 


REAL*8 


Any 

REAL 

arguments 


REAL* 8 


Notes. 

(See end of Figure 5.) 



o 



Figure 5. Miscellaneous mathematical subroutines (Part 2 of 3) 
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General 
function 


Function or 

entry 

name 


Definition 


Arguments 


Function value 
type 1 


No. 


Type 1 


Range 


Modular 
arithmetic 


MOD 


y=Xj modulo x 2 
(See Note 4) 


2 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


X 2 =5t0 

(See Note 5) 


INTEGER*2 or 
INTEGER*4 


MOD# 

(See Note 3) 


y=Xj modulo x 2 
(See Note 4) 


2 


INTEGER*2 


x 2 *0 
(See Note 5) 


INTEGER*2 


AMOD 


y=X! modulo x 2 
(See Note 4) 


2 


REAL*4 


x 2 *0 
(See Note 5) 


REAL*4 


DMOD 


y=Xj modulo x 2 
(See Note 4) 


2 


REAL* 8 


x 2 *0 
(See Note 5) 


REAL*8 


Positive 
difference 


DIM 


y=x 1 -min(x 1 ,x 2 ) 


2 


REAL*4 


Any 
REAL 

arguments 


REAL*4 


IDIM 


y=x 1 -min(Xi,x 2 ) 


2 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


Any 

INTEGER 

arguments 


INTEGER* 2 

or 

INTEGER*4 
(See Note 2) 


IDIM# 

(See Note 3) 


y=x 1 -min(Xi,x 2 ) 


2 


INTEGER* 2 


Any 
INTEGER 

arguments 


INTEGER* 2 


Transfer 

of 

sign 


SIGN 


y=sgn(x 2 ) IxJ 
(See Note 6) 


2 


REAL*4 


x 2 =£0 
(See Note 6) 


REAL*4 


DSIGN 


y=sgn(x 2 ) |xj 


2 


REAL*8 


x 2 *0 
(See Note 6) 


REAL* 8 


ISIGN 


y=sgn(x 2 ) |xj 


2 


INTEGER* 2 

or 

INTEGER*4 

(See Note 2) 


x 2 ¥=0 
(See Note 6) 


INTEGER* 2 or 
INTEGER*4 


ISIGN# 

(See Note 3) 


y=sgn(x 2 )|x 1 | 


2 


INTEGER* 2 


x 2 ¥=0 
(See Note 6) 


INTEGER* 2 


Notes. 

Assembler programming: REAL*4 and REAL*8 FORTRAN IV arguments correspond to doubleword and two-doubleword floating- 
point arguments, respectively. 

2 In FORTRAN IV, argument and value must be the same type. In assembler language, this entry name is for doublewords only. 

3 These entry names are for assembler language programs only. 

4 The expression x l modulo x 2 is defined as x, -x 2 [x t /x 2 Jwhere the brackets indicate that an integer is used. The largest integer 
whose magnitude does not exceed the value of x t /x 2 is used. The sign of the integer is the same as the sign of x t /x 2 . 

s If x 2 = 0, the modular function is undefined. In this case, a divide exception is recognized, and an interruption occurs. 
6 The sgn function is defined as follows: sgn(x 2 ) = 1 if x 2 > 0, and sgn(X 2 ) = -1 if x 2 < 0. If x 2 = 0, sgn(x) is not defined. In this 
case, the transfer-of-sign function does not indicate an error, but its results are unpredictable. 



Figure 5. 



Miscellaneous mathematical subroutines (Part 3 of 3) 
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General function 


Entry * name 


Implicit 2 function reference 


Arguments 


Function value type 


No. 


Type 3 


Raise an integer to 
an integer power 


IEXP# 


m=i**j 


2 


i=INTEGER*2 
j=INTEGER*2 


m=INTEGER*2 


IEXP 


m=i**j 


2 


i=INTEGER*4 
j=INTEGER*4 


m=INTEGER*4 


Raise a real 
number to an 
integer power 


EXPI# 


y=x**k 


2 


x=REAL*4 
k=INTEGER*2 


y=REAL*4 


EXPI 


y=x**k 


2 


x=REAL*4 
k=INTEGER*4 


y=REAL*4 


DEXPI# 


y=x**k 


2 


x=REAL*8 
k=INTEGER*2 


y=REAL*8 


DEXPI 


y=x**k 


2 


x=REAL*8 
k=INTEGER*4 


y=REAL*8 


Raise a real 
number to a real 
power 


EXPE 


y=X**Z 


2 


x=REAL*4 
z=REAL*4 


y=REAL*4 


DEXPD 


y=X**Z 


2 


x=REAL*8 
z=REAL*8 


y=REAL*8 


Divide a 

doubleword integer 
by a doubleword 
integer 


IDIV 


k=l/m 


2 


1=INTEGER*4 
m=INTEGER*4 


k=INTEGER*4 


Multiply a 
doubleword integer 
by a doubleword 
integer 


IMULT 


k=l*m 


2 


1=INTEGER*4 
m=INTEGER*4 


k=INTEGER*4 


Notes. 

1 Entry names are used in assembler language programs only. 

2 This is only a representation of a FORTRAN IV statement; it is not the only way the subroutine can be called. 

3 Assembler programming: REAL*4 and REAL*8 FORTRAN IV arguments correspond to doubleword and two-doubleword 

floating-point arguments, respectively. 
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Figure 6. Exponentiation and INTEGER*4 (doubleword) multiplication and division subroutines 



Conversion Subroutines 



Input and output data conversions are made easier by the MFSL EBCDIC 
conversion subroutines. Numerical input data in EBCDIC format can be 
converted to an internal representation in integer or floating-point format. After 
computations in integer or floating-point arithmetic, the resulting numerical 
output can be converted back to an EBCDIC format. These subroutines are 
described in Figure 7. 

To use the conversion subroutines, the user program must establish input and 
output buffers and manage their contents by using the READ/WRITE facilities 
of FORTRAN IV or the macro assembler language. The MFSL conversion 
subroutines always move data between a variable in the user program and an 
input or output buffer. Each conversion subroutine manages its buffer so that 
repeated calls to the subroutine will process sequential fields in the buffer. When 
the buffer is completely processed, the conversion subroutine goes back to the 
beginning of the buffer for the next conversion following a READ or WRITE 
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To convert from 


To 


Call entry name 


EBCDIC (with or without 
exponent) 


Floating-point single precision 


$ECIN 


Floating-point double precision 


$DCIN 


EBCDIC (no exponent) 


Fullword integer 


$I2CIN 


Doubleword integer 


$I4CIN 


Floating-point 
single precision 


EBCDIC (with exponent) 


$ECOT 


EBCDIC (no exponent) 


$FCOT 


Floating-point 
double precision 


EBCDIC (with exponent) 


$DCOT 


EBCDIC (no exponent) 


$FCOTD 


Fullword integer 


EBCDIC (no exponent) 


$I2COT 


Doubleword integer 


EBCDIC (no exponent) 


$I4COT 



Figure 7. EBCDIC conversions and MFSL subroutines 

I/O operation. The user call to a conversion subroutine requires a parameter list 
to specify the following: 

• The name of the variable used in the user program 

• The width (in characters) of the input or output buffer field for each 
conversion 

• The name of the input or output buffer 

• The value of a decimal scale factor (if used) 

• The default number of decimal places (if used) 



Error-checking Subroutines 



The MFSL subroutines communicate with the user through flags in the MFSL 
library work area. There are no MFSL error messages. The typical MFSL 
procedure for error handling is that the error-detecting subroutine (for example, 
SQRT detecting a negative argument) sets a flag in the library work area and 
then continues processing according to a predefined rule (such as taking the 
square root of the absolute value). To check for errors, the user must either 
check function arguments before invoking a subroutine or use the error-checking 
subroutines to validate the results. These subroutines are described in Figure 8. 
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To check 


Using as 
interface variables 


Call 

assembler 

name 


Call 

FORTRAN IV 
name 


Logarithmic, trigonometric, 
exponential, square root, 
conversion subroutines 


Fullwords 


FCTST# 


FCTST 


Doublewords 


FCTST 


FCTST 


Floating-point 
divide by zero 


Fullwords 


DVCHK# 


DVCHK 


Doublewords 


DVCHK 


DVCHK 


Floating-point 
overflow or 
underflow 


Fullwords 


OVERFL# 


OVERFL 


Doublewords 


OVERFL 


OVERFL 



Figure 8. Error conditions and MFSL error-checking subroutines 

In using the error-checking subroutines, the user does not directly access the 
library work area. The subroutine call requires a parameter list that names an 
interface variable that is used in the user program. The error-checking subroutine 
accesses the library work area and sets the interface variable to indicate the error 
status to the user program. On return from the error-checking subroutine, the 
user program must test the interface variable to determine whether an error was 
detected. Each call to an error-checking subroutine resets the associated error 
indicator bits in the library work area. The values returned by the error-checking 
subroutines are shown in Figure 9. 



Error-checking subroutine 


Returned value 


Error status indicated 


DVCHK or DVCHK# 


1 


Division by zero occurred 


2 


No division by zero occurred 


FCTST or FCTST# (See 
note below) 


1 


Function error occurred 


2 


No function error occurred 


OVERFL or OVERFL* 


1 


Overflow occurred 


2 


No overflow or underflow occurred 


3 


Underflow occurred 


Note. Two interface variables are required for function test. If the first indicates that an 
error occurred, the second can be tested to determine the specific error. 



Figure 9. Returned values from error-checking subroutines 



Service Subroutines (Called by Assembler Language Programs Only) 

The MFSL subroutines require an operating environment that includes the library 
work area and an interruption-handling facility. This environment is established 
by the FORTRAN IV compiler for FORTRAN IV programs or a set of 
programs whose main program is in FORTRAN IV. Assembler language 
programs that do not execute in a FORTRAN IV environment must perform 
these service subroutine calls. The library service subroutines are described in 
Figure 10. 






12 GC34-0138 






MFSL Library Work Area 



Interruption Handling 






To 


Call entry name 


Initialize library work area 


$FMYINT 


Delete library work area 


$FMYTRM 


Specify abnormal termination routine 


$FMYSPE 



Figure 10. Library services and MFSL subroutines (called by assembler programs only) 

The user controls the service subroutines through the calling parameters and 
interprets their actions through returned parameters or return codes. The user 
communication with the service subroutines is shown in Figure 1 1 . 



The MFSL library work area is created and initialized by the service subroutine 
$FMYINT. The library work area is deleted by $FMYTRM. The initialization 
subroutine should be called before any other MFSL subroutines are invoked. The 
termination routine should be called after all MFSL subroutines have been 
invoked. 



The MFSL subroutines intercept floating-point exceptions to provide 
error-handling support. The user can specify a subroutine to receive control when 
a program check other than floating-point occurs or when an abnormal 
termination macro instruction (STOPTASK) is issued. 
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Service subroutines 


Calling parameter list (pointed 
to by register 0) 


Return code (RC) in register 
or parameter list (pointed 
to by register 0) 


$FMYINT 


Word I: Address of a flag 
field to describe the 
operating environment and 
required MFSL functions 
(see note below). 
Word 2: If dynamic 
allocation option is not used, 
the address of a pointer to a 
storage area for the library 
work area. 


Word 2: Address of a pointer 
to the library work area. 

Or 

RC=0: Successful first 
initialization (pointer to 
library work area is in task 
work stack descriptor). 
RC=2: Successful 
initialization (pointer to 
library work area is in task 
work stack descriptor). 
RC=4: No MFSL functions 
requested. 

RC=6: Internal error 
occurred (initialization 
results unknown). 


$FMYTRM 


None 


RC=0: Successful release of 

library work area. 

RC=2: No library work area 

existed when $FMYTRM 

was called. 

RC=4: Reserved. 

RC=6: Internal error 

occurred (termination results 

unknown). 


$FMYSPE 


Word 1: Address of a 
pointer to the routine to get 
control on abnormal 
termination. 
Word 2: Address of a 
pointer to the parameter list 
passed to the abnormal 
termination routine. 


Word 3: Address of a pointer 
to the abnormal termination 
routine that existed when 
$FMYSPE was called (if 
none existed, this word 
contains zero). 
Word 4: Address of a pointer 
to the parameter list that was 
specified on the last call to 
$FMYSPE (if none was 
specified, this word contains 
zero). 


Note. The option flags are as follows: 
Bits Meaning 
0-3 Reserved 

4 Conversion subroutines used 

5 Mathematical subroutines used 
6-7 Reserved 

8 Dynamic allocation allowed 

9-14 Reserved 

15 Abnormal termination exit allowed 



Figure 11. User communication with service subroutines 
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Configuration Requirements 
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Hardware Support 



o 



Program Support 



The system installation must be properly equipped to use MFSL. Both hardware 
and software requirements are given below. 



1. Processors: 

- 4953 

- 4955 

2. Processor Features (optional): 

- Floating-point Feature Number 3920 (4955 Processor only) 

3. Primary Storage Considerations: 
For MFSL (See also Appendix A.): 

- The size of user-called subroutines 

- The size of subroutine-called subroutines 

- The size of the error exit routine 

- The size of operating system services 
For User: 

- The size of linkage code for all calls 

4. Secondary Storage (Approximate Sizes): 
For MFSL: 

- The size of the MFSL object 

library, if installed, 38 912 bytes 

- The size of the MFSL load 

module library, if installed, 139 008 bytes 

- If both libraries are installed, 

the total, 177 920 bytes 



MFSL is supported by the Realtime Programming System program product and 
the Program Preparation Subsystem program product. These programs allow the 
user to assemble, compile, combine, and execute programs that use the MFSL 
subroutines. 

If floating-point operations are used and the floating-point hardware feature is 
not installed, then the floating-point emulator option of the Realtime 
Programming System must be installed. If no functions that require REAL 
arithmetic are used, MFSL has no requirement for floating-point support in either 
hardware or software. The functions that require floating-point support are the 
following: 

Logarithmic and exponential 

Trigonometric 

Hyperbolic 

Exponentiation with REAL variables 

Arithmetic with REAL variables 

EBCDIC conversions with REAL variables 
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MFSL and the Application System 









o 



The following topics describe the user actions required to use MFSL. They are 
presented in the order that represents a typical application. 

Installing MFSL 

At any time after system generation, the distribution library copies of the MFSL 
subroutines can be copied from diskette to the system library specified by the 
user. Distribution libraries are provided for both object and composite modules, 
so no further assemblies or compilations are required. Both object and composite 
modules are required to fully support task set preparation. During phase 1 of the 
application builder, the MFSL object modules can be included in overlay 
structures. During phase 3 of the application builder, the MFSL composite 
modules can be included in the task set load module. Installation of the MFSL 
object and composite module libraries is independent. If there is no requirement 
for the MFSL object modules (such as overlay programming), the object module 
library need not be installed. 

Sharing MFSL Modules 

MFSL uses reentrant programming techniques to allow different user programs to 
share the subroutines. The MFSL subroutines can be resident or transient in any 
user partition. The subroutines can be shared by programs in one or more 
partitions. 

Referencing MFSL from Assembler Programs 

The assembler user references all MFSL subroutines through the CALL macro 
instruction using the PARM= parameter list to pass arguments. Usually, the 
subroutines return the function value in a register. In some cases, the value is 
returned in a storage location whose address is passed as an input argument. An 
example of the assembler interface is 

CALL SIN,PARM=(X) 
X DC E ' ' 

which finds the sine of the argument X. X is the name of a single-precision 
floating-point field that is defined in the caller's program. The result is returned 
in floating-point register following the call. 

Referencing MFSL from FORTRAN IV Programs 

The FORTRAN IV user references some MFSL subroutines as FORTRAN IV 
FUNCTION subprograms, some subroutines by CALL statements, and other 
subroutines implicitly in FORTRAN IV statements. 

The mathematical subroutines supported by FORTRAN IV as FUNCTION 
subprograms are typically coded as 

A = SIN(X) 

where SIN is the name of the FUNCTION subprogram. 
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The FORTRAN IV user can invoke other subroutines through the CALL 
statement, such as 

CALL FCTST( I, J) 

where the function test subroutine is invoked with I and J as parameters. 

Implicit references to the MFSL subroutines are made in two ways. The first 
way is through the FORTRAN IV exponentiation notation, such as 

Y = X**2.5 

where a subroutine is needed to raise X to the 2.5 power. The second way in 
which an implicit reference is made is through the compiler selection of 
INTEGER*2 or INTEGER*4 subroutines according to the CMP AT or 
NOCMPAT compiler options. (See the publication FORTRAN IV. Language 
Reference, GC34-0133, for further information on the compiler option.) 

Building Applications with MFSL 

After MSFL is installed in the system, the MFSL modules can be combined with 
user-written programs to build the application. When the automatic call facility of 
the application builder is used to reference MFSL, the user need only make 
source code references to the subroutines. In the compile-load-go process, the 
application builder automatically includes the MFSL modules in the application 
task set load module. 

Executing the Application 

During execution there are no user actions or interfaces with the MFSL 
subroutines. The MFSL functions interact with the application programs and the 
library work area. 

Managing Storage 

The following discussion of storage management topics is provided to show 
storage-critical installations how they can use the flexibility of MFSL to minimize 
the MFSL storage requirement. The design of typical applications will not require 
the use of these storage optimization techniques. 

Storage Optimization Techniques 

For any given system generation and application design, there is an optimum way 
to install the MFSL subroutines to minimize their storage requirements. The 
Series/ 1 program products that allow the user to prepare efficient software 
configurations for MFSL applications are the following: 

• The shared task set capability of the Realtime Programming System program 
product 

• The application builder facility of the Program Preparation Subsystem program 
product 

The Realtime Programming System allows the user to take advantage of the 
reentrant property of the MFSL subroutines. When included in the shared task 
set, an MFSL subroutine can be executed by different programs in different 
partitions at the same time. A single in-storage copy of the subroutine in the 
shared task set eliminates the need to allocate storage for the subroutine in any 
other partition. 

The application builder allows a user task set to minimize its MFSL storage 
requirement in three ways: First, the application builder allows the task set to 
include only the subset of MFSL subroutines that it actually needs. Secondly, the 
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application builder allows a group of main programs that executes in one task set 
to include MFSL subroutines in a shared subroutine area so that a single 
in-storage copy of each subroutine can be executed by any main program or 
subprogram in the partition. Finally, the application builder allows the MFSL 
subroutines to be used in overlay structures. 

The basic MFSL installation questions are these: 

• Which MFSL subroutines should go into the shared task set? 

• Which MFSL subroutines should go into a shared subroutine area? 

The answers to these questions must be based on an analysis of unique system 
and application characteristics. The following topics describe the problems and 
some methods for their solution. 

Using a Shared Task Set for MFSL 

Different applications can be independently prepared for each partition. If this 
approach is taken, the application builder will combine the programs for each 
task set, and MFSL subroutines that are referenced will be included in each task 
set. This approach will result in a software configuration such as the one shown 
on the "problem" side of Figure 12. In this case, a four-partition system has 
been generated. Partition contains the Realtime Programming System, and 
partitions 1-3 are for user applications. Because each of the applications uses the 
MFSL subroutines, MFSL is built into each of the user partitions. This approach 
uses storage inefficiently because many of the same MFSL modules are included 
three times. 



Problem: 



Solution: 
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Figure 12. Using a shared task set for MFSL 
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On the "solution" side of Figure 12, the system has been redesigned to include 
partition 4 as a shared task set. The MFSL subroutines included in the shared 
task set are now referenced from programs that execute in the three original user 
partitions. Now, there is only one copy of each MFSL subroutine in storage. The 
cross-partition references are made possible by using the application builder to 
combine each user task set in partitions 1-3 with the shared task set in 
partition 4. 
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The specific MFSL subroutines placed in the shared task set can be selected in 
two ways: One method is simple and flexible, but it does not ensure an absolute 
minimum storage requirement. The other method requires more analysis, but it 
does eliminate all redundancy. 

The simple way is to include all MFSL modules in the shared task set. Then, 
any application that uses MFSL can be combined with the shared task set to 
resolve its external references to MFSL subroutines. This method is appropriate 
if the application usage of MFSL is unknown or unpredictable for a variable set 
of applications. 

The other method of selecting MFSL subroutines for the shared task set is 
shown in Figure 13. Here, the subroutine requirements of each partition are 
known in advance. The subroutines used can be tabulated for all partitions, and 
only those that are used by more than one partition need be placed in the shared 
task set. The other subroutines, which are used only in one partition, can be 
included with that partition. This method is appropriate for a dedicated set of 
applications where efficiency is more important than flexibility. 



o 



User partitions 



Partition 1 
Subroutines used: 



Partition 2 
Subroutines used: 



Partition 3 
Subroutines used: 




Partition 4 



Shared task set 
Subroutines used: 



Used in more than one partition 



Figure 13. Selecting subroutines for the shared task set 



Using a Subset of MFSL 



The organization of MFSL, which provides each function as a separate object or 
composite module, provides a great advantage to the user who needs only a few 
MFSL functions. In the process of building applications, the application builder 
can construct overlays by including the specified MFSL object modules during 
phase 1. The application builder can also resolve external references from 
user-written programs to MFSL subroutines by bringing the appropriate MFSL 
composite modules into a task set load module during phase 3. Only the MFSL 
modules that are used (plus supporting data areas) are made part of the task set 
load module. The result is that each user task set requires storage only for a 
subset of the total MFSL. The user task set does not require storage for unused 
subroutines. Figure 14 illustrates the problem that would exist if the entire 
subroutine library had to be in a task set that used only a subset of the MFSL 
functions. The storage estimating information in Appendix A shows how to 
approximate the actual storage that a task set will need for MFSL, based on the 
functions used. 
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Figure 14. Using an MFSL subset in a task set 

Including MFSL Subroutines in a Shared Subroutine Area 

When an application contains many programs, it is often convenient to develop 
and test the application in logical groups of programs. As the programs that make 
up a functional unit of the application are completed, they can be combined to 
form task set load modules that can be executed and tested independently. When 
all of the functional units are completed, their composite modules can be 
combined to form the task set load module for the application. This step-by-step 
process allows testing during development and makes it easier to produce the 
complete set of programs for the application. 

When identical MFSL modules are used throughout a large application, they 
should be combined into a shared subroutine area to conserve storage space. This 
means that the MFSL library should be specified as input to the application 
builder only during the phase 3 process when the composite modules are 
combined to build the task set load module. 

The "problem" side of Figure 15 shows the task set load module structure that 
would result if MFSL were specified as input to the application builder during 
separate phase 1 combinations of the three main programs shown. Because two 
of the main programs had references to MFSL, the MFSL modules were included 
twice. This task set structure does not take advantage of a shared subroutine 
area. 

The "solution" side of Figure 15 shows the same task set structure modified to 
use a shared subroutine area. When each of the main programs was combined 
during phase 1 execution of the application builder, MFSL was not specified as 
input. The external references to MFSL modules were left unresolved in the 
composite modules. Finally, during Phase 3 execution, MFSL was specified as 
input to the application builder. At this time, the MFSL modules were included. 
However, only one copy of each MFSL subroutine was brought into the task set 
load module. Now, external references to MFSL from any program in the task 
set can be resolved to a single in-storage copy of each MFSL subroutine. The 
storage allocated to MFSL is in a shared subroutine area rather than in the 
composite modules of each main program. 

The process of selecting MFSL modules for a shared subroutine area is similar 
to the process of selecting MFSL subroutines for the shared task set. Figure 16 
shows the tabular method of selecting commonly used subroutines. This approach 
produces a shared subroutine area of minimum size. However, the total task set 
size would be the same if all of the referenced subroutines were placed in the 
shared subroutine area. Therefore, on a task set basis, the simple approach of 
placing all MFSL modules in the shared subroutine area requires the minimum 
amount of storage for MFSL. 
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Figure 15. Using a shared subroutine area for MFSL 
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Figure 16. Selecting subroutines for a shared subroutine area 
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Appendix A. Storage Estimating 









The following information can be used to determine the additional storage 
required by application programs to support MFSL functions. The storage 
requirements analysis must consider these factors: 

• Basic MFSL storage requirement 

• MFSL functional storage requirement 

• Common MFSL subroutines 

The module sizes and all resulting storage requirements given in this appendix 
are approximate. 

Basic MFSL Storage Requirement 

Any application that uses MFSL must include the following: 

• Space in the partition dynamic area (free storage) for a library work area of 
32 bytes 

• Space for the MFSL error exit routine ($FMYABN) of 136 bytes 

The total basic MFSL storage requirement is 168 bytes. 

MFSL Functional Storage Requirements 

When an application program uses an MFSL function, the user interface is either 
a function name or the FORTRAN IV exponentiation notation. The name or 
notation used in the application program provides a link to the MFSL 
subroutines. 

In assembler language programs, most MFSL functions require an interface 
module plus one or more dependent subroutine modules to perform the function. 
The interface modules are not required by FORTRAN IV programs. For 
example, Figure 17 shows the module dependencies that result from references to 
the modular arithmetic and hyperbolic tangent functions. The same module 
dependencies result for references from the FORTRAN IV program or the 
assembler program, except for the interface modules. 

The MFSL storage requirement for the functions shown in Figure 17 includes 
the following: 

• The interface modules for the assembler program, MOD and TANH: total 8 
bytes 

• The modular arithmetic function $FMEMOD and its module dependencies for 
dividing and multiplying integers, $FMDDDD and $FMDDMD: total 424 
bytes 

• The single-precision hyperbolic tangent function, $FMETNH, and its module 
dependency for the single-precision exponential function, $FMEEXP: total 
432 bytes. 

The total for all of the above functions is 864 bytes. This storage requirement 
is in addition to the basic MFSL requirement of 168 bytes for the library work 
area and the error exit routine. Thus, the total MFSL storage requirement for the 
user application is 1032 bytes. 



o 
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FORTRAN program 



Y = MOD (A,B) 

Y = TANH (X) 



Assembler program 



CALL MOD, 

. . . PARM = (A,B,Y) 

CALL TANH, 

PARM = (X) 



4 bytes 



MOD 



Interface 
module 



User interface 



106 bytes 



$FMEMOD 



Modular arithmetic 
function: 
INTEGER*4 
arguments and value 



4 bytes 



TANH 



Interface 
module 



142 bytes 



$FMETNH 



Single-precision 

hyperbolic 

tangent 



222 bytes 



$FMDDDD 



Divide 

INTEGER*4 by 
INTEGER*4 



96 bytes 



$FMDDMD 



Multiply 
INTEGER*4 by 
INTEGER*4 



290 bytes 



$FMEEXP 



Single-precision 

exponential 

function 



Figure 17. Typical MFSL module dependencies 

Common MFSL Subroutines 

The above example using the data in Figure 17 illustrates an important point to 
consider when estimating storage requirements: Only one copy of each required 
MFSL module need be included in the task set load module. If the functional 
storage requirements for the FORTRAN IV program and the assembler program 
in Figure 17 were calculated independently and the results added together to 
obtain the application storage requirements, then the basic MFSL modules would 
be counted twice. The functional storage requirement would appear to be almost 
twice as large as it really is. 

Common subroutines can also reduce the apparent functional storage 
requirement for a single program. This case is illustrated by the sine and cosine 
functions. In Figure 18, an assembler program is shown referencing both the sine 
and cosine functions. Because the sine-cosine subroutine $FMESNC is common 
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to both functions, the total functional storage requirement is only 206 bytes. The 
requirement for sine or cosine alone is 202 bytes. The only module requirement 
for the additional function is the interface module. In FORTRAN IV, there is no 
additional module requirement; the only requirement is 198 bytes for $FMESNC. 






Assembler program 



CALL COS,PARM=(Z) 

• • • 

CALL SIN,PARM=(Z) 



4 bytes 



SIN 



Interface 
module 



4 bytes 



COS 



Interface 
module 



User interface 



198 bytes 



$FMESNC 



Single-precision 

sine-cosine 

function 



Figure 18. Common subroutine usage 

The basic tool for MFSL storage estimating is the MFSL functional storage 
requirements table given in Figure 19. This table gives the total storage required 
for each MFSL function. Module dependencies are shown, including the size of 
each module required. 

The table should be used in the following way: 

1. Identify all MFSL functions used by your application. (FORTRAN IV 
programs should include their module requirements for exponentiation by 
using the entry names given in Figure 6 for assembler programs.) 

2. Look up each function you use in the "Function or entry name" column. 
Note the modules required, and cumulatively total the number of bytes given 
in the "Maximum storage required" column. (The last column is the sum of 
the individual modules required. Estimates for FORTRAN IV programs 
should subtract the 4 bytes used by the interface module.) 

3. As each function is totaled, check the modules required to make sure that 
none are counted twice. Whenever a common subroutine is encountered, 
subtract its size from the "Maximum storage required" entry before adding 
the functional storage requirement to the cumulative total. 

When the storage required for all the functions is totaled in this way, the result 
is your application's MFSL functional storage requirement. Add this to the basic 
MFSL requirement to find the total MFSL storage requirement for your 
application. 
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Function or entry 
name 


Modules required 
(assembler onlyf) 


Module size (bytes) 


Maximum storage 
required (bytes) 


$DCIN 


$DCINt 

$FFDCIN 

$FFCHRC 

SFFFTEN 


4 

880 

92 

412 


1388 


$DCOT 


$DCOTt 
$FFDCOT 

SFFFTEN 


4 
1146 

412 


1562 


$ECIN 


$ECINf 
$FFDCIN 
$FFCHRC 
SFFFTEN 


4 

880 
92 
412 


1388 


$ECOT 


$ECOTt 

SFFDCOT 

SFFFTEN 


4 

1146 

412 


1562 


$FCOT 


SFCOTt 

SFFDCOT 

SFFFTEN 


4 

1146 

412 


1562 


$FCOTD 


SFCOTDt 
SFFDCOT 
SFFFTEN 


4 

1146 

412 


1562 


$FMYINT 


SFMYINT 
SFMYABN 
(Weak Reference) 


336 
136 


472 


SFMYSPE 


SFMYSPE 


18 


18 


$FMYTRM 


SFMYTRM 


190 


190 


$I2CIN 


$I2CINt 

SFFI2CIN 

SFFCHRC 


4 

146 

92 


242 


$I2C0T 


$I2COTf 
SFFI2COT 


4 
156 


160 


$I4CIN 


$I4CINt 

SFFI4CIN 

SFFCHRC 


4 

158 

92 


254 


$I4C0T 


$I4COTt 
SFFI4COT 


4 
164 


168 


ALOG 


ALOGt 
SFMELOG 


4 

232 


236 


ALOG10 


ALOG 10t 
SFMELOG 


4 

232 


236 


AMAXO 


AMAXOt 
SFMEAMXO 


4 
56 


60 


AMAXO# 


AMAX0#t 
SFMNAMXO 


4 
56 


60 



Figure 19. MFSL functional storage requirements table (Part 1 of 4) 
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Function or entry 
name 


Modules required 
(assembler onlyf) 


Module size (bytes) 


Maximum storage 
required (bytes) 


AMAX1 


AM AX If 
$FMEAMX1 


4 
46 


50 


AMINO 


AMINOt 
$FMEAMN0 


4 
56 


60 


AMINO# 


AMINO#t 
$FMNAMN0 


4 
56 


60 


AMIN1 


AMINlt 

$FMEAMN1 


4 
46 


50 


AMOD 


AMODf 
$FMEAMOD 


4 
36 


40 


ATAN 


ATANt 
$FMEATN 


4 
264 


268 


ATAN2 


ATAN2t 
$FMEATN 


4 
264 


268 


COS 


cost 

$FMESNC 


4 
198 


202 


DATAN 


DATANt 

$FMLATN 


4 
378 


382 


DATAN2 


DATAN2t 
SFMLATN 


4 
378 


382 


DCOS 


DCOSt 

$FMLSNC 


4 
332 


336 


DEXP 


DEXPt 

$FMLEXP 


4 
390 


394 


DEXPD 


DEXPDt 

$FMLLPL 


4 
62 


66 


DEXPI 


DEXPIt 
$FMLLPD 


4 
94 


98 


DEXPI# 


DEXPI#t 
$FMLLPF 


4 
78 


82 


DIM 


DIMt 
$FMEDIM 


4 
36 


40 


DLOG 


DLOGt 
$FMLLOG 


4 
302 


306 


DLOG10 


DLOGlOt 
$FMLLOG 


4 
302 


306 


DMAX1 


DMAXlt 
$FMLMAX1 


4 
46 


50 


DMIN1 


DMINlt 
$FMLMIN1 


4 
46 


50 



Figure 19. MFSL functional storage requirements table (Part 2 of 4) 
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Function or entry 
name 


Modules required 
(assembler onlyf) 


Module size (bytes) 


Maximum storage 
required (bytes) 


DMOD 


DMODf 
$FMLDMOD 


4 
38 


42 


DSIGN 


DSIGNf 
$FMLSGN 


4 

32 


36 


DSIN 


DSINf 

$FMLSNC 


4 

332 


336 


DSQRT 


DSQRTf 
$FMLSQR 


4 
116 


120 


DTANH 


DTANHf 

$FMLTNH 

$FMLEXP 


4 

188 

390 


582 


DVCHK 


DVCHKf 
$FMDDCK 


4 
18 


22 


DVCHK# 


DVCHK#f 
$FMEDCK 


4 
16 


20 


EXP 


EXPf 
$FMEEXP 


4 
290 


294 


EXPE 


EXPEt 
$FMEEPE 
$FMEEXP 
$FMELOG 


4 

62 

290 

232 


588 


EXPI 


EXPIt 
SFMEEPD 


4 
94 


98 


EXPI# 


EXPI#t 
$FMEEPF 


4 
78 


82 


FCTST 


FCTSTt 
$FMDFNT 


4 
40 


44 


FCTST# 


FCTST#t 
$FMFFNT 


4 

32 


36 


IDIM 


IDIMt 
SFMLIDIM 


4 
86 


90 


IDIM# 


IDIM#t 
$FMNIDIM 


4 
40 


44 


IDIV 


IDIVt 
$FMDDDD 


4 

222 


226 


IEXP 


IEXPt 
$FMDDPD 


4 
186 


190 


IEXP# 


IEXP#t 
$FMFFPF 


4 
36 


40 


IMULT 


IMULTt 
$FMDDMD 


4 
96 


100 



Figure 19. MFSL functional storage requirements table (Part 3 of 4) 
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O 

^m, -/ 



Function or entry 
name 


Modules required 
(assembler onlyf) 


Module size (bytes) 


Maximum storage 
required (bytes) 


ISIGN 


ISIGNt 
SFMDSGN 


4 
40 


44 


ISIGN# 


ISIGN#t 
$FMFSGN 


4 

22 


26 


MAXO 


MAXOt 
$FMEMAX0 


4 
94 


98 


MAXO# 


MAX0#t 
$FMNMAX0 


4 
46 


50 


MAX1 


MAX It 
$FMEMAX1 


4 
102 


106 


MAX1# 


MAXl#t 
$FMNMAX1 


4 
56 


60 


MINO 


MINOf 

$FMEMIN0 


4 
94 


98 


MINO# 


MIN0#| 
$FMNMIN0 


4 
46 


50 


MINI 


MINlt 
$FMEMIN1 


4 
102 


106 


MINI* 


MINl#t 
$FMNMIN1 


4 
56 


60 


MOD 


MODt 
$FMEMOD 
$FMDDDD 
$FMDDMD 


4 
106 

222 
96 


428 


MOD* 


MOD#t 
SFMNMOD 


4 
36 


40 


OVERFL 


OVERFLt 
$FMDOFL 


4 
18 


22 


OVERFL* 


OVERFL#t 
$FMFOFL 


4 
16 


20 


SIGN 


SIGNt 

$FMESGN 


4 

32 


36 


SIN 


SINt 
$FMESNC 


4 
198 


202 


SQRT 


SQRTt 
$FMESQR 


4 
130 


134 


TANH 


TANHt 

$FMETNH 

$FMEEXP 


4 

142 

290 


436 



Figure 19. MFSL functional storage requirements table (Part 4 of 4) 
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Index 



$DCIN 11 
$DCOT 11 
$ECIN 11 
$ECOT 1 1 
$FCOT 11 
$FMYINT 13 
$FMYSPE 13 
$FMYTRM 13 
$I2CIN 11 
$I2C0T 11 
$I4CIN 11 
$I4C0T 11 



EBCDIC conversion 10 

emulators, floating-point 15 

error-checking subroutines 1 1 

error conditions 1 2 

error exit routine, storage requirement 

estimating storage 23 

executing MFSL (see referencing MFSL) 

EXP 5 

explicitly called MFSL subroutines 4 

exponential subroutines 5 

exponentiation subroutines 10 



23 









ALOG 5 
ALOG10 5 
AMAXO 7 
AMAX0# 7 
AMAX1 8 
AMINO 7 
AMIN0# 7 
AMIN1 8 
arc tangent 6 
ATAN 6 
ATAN2 6 



basic MFSL storage requirement 23 
building applications 18 



CMP AT option 18 
combining MFSL 18 
common subroutines 24 
configuration requirements 15 
COS 6 
cosine 6 



DATAN 6 

DATAN2 6 

DCOS 6 

dependent modules 23 

DEXP 5 

DIM 9 

divide check 12 

divide doubleword integers 10 

DLOG 5 

DLOG10 5 

DMAX1 8 

DMIN1 8 

DMOD 9 

DSIGN 9 

DSIN 6 

DSQRT 5 

DTANH 6 

DVCHK 12 

DVCHK# 12 



FCTST 12 

FCTST# 12 

floating-point emulators 15 

FORTRAN IV programs, referencing MFSL 1 7 

function test (see FCTST; FCTST#) 

functional storage requirement 23 



hardware support 15 
hyperbolic tangent 6 



IDIM 9 
IDIM# 9 
IDIV 10 
IMULT 10 
installing MFSL 17 
interface modules 23 
interruption handling 13 
ISIGN 9 



library services 12 

library work area 1 2 

library work area, storage requirement 23 

logarithmic and exponential MFSL subroutines 



managing storage 18 

mathematical and functional subroutine library 

contents 3 
mathematical subroutines 3 
maximum value 7 
MAX0 7 
MAX0# 7 
MAX1 8 
MAX1# 8 
MFSL subsets 20 
minimizing storage 18 
minimum value 7 
MIN0 7 
MIN0# 7 
MINI 8 
MIN1# 8 
MOD 9 
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MOD# 9 

modular arithmetic 9 
module dependencies 23 
multiply doubleword integers 10 



NOCMPAT option 18 



OVERFL 12 
overflow check 1 2 
OVERFL# 12 



positive difference 9 
powers 10 
primary storage 15 
program support 15 



referencing MFSL 

from assembler programs 17 
from FORTRAN programs 17 



secondary storage 15 
service subroutines 1 2 
services, library 1 3 
shared subroutine area 21 
shared task set 19 
sharing MFSL 17 
SIGN 9 
SIN 6 
sine 6 
SQRT 5 
square root 5 
storage estimating 23 
storage management 1 8 
storage requirements 15 
subroutine area, shared 21 
subroutines 

conversion 2 

error-checking 2 

mathematical 1 

service 2 
subsets of MFSL 20 



TANH 6 

task set, shared 19 

transfer of sign 9 

trigonometric MFSL subroutines 



underflow check 12 
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